perm filename LOSS.TEX[TIM,LSP]1 blob sn#762125 filedate 1984-07-15 generic text, type C, neo UTF8
COMMENT āŠ—   VALID 00003 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	\input verbat.tex[pap,rpg]
C00004 00003	\begintt
C00012 ENDMK
CāŠ—;
\input verbat.tex[pap,rpg]
\begintt

(defun apply-subst-lst (alist lst)
  (cond ((null lst)
         nil)
        (t (cons (apply-subst alist (car lst))
                 (apply-subst-lst alist (cdr lst))))))

\endtt

\begintt
1 2 3 4 5 6 7 8
  1 2 3 4 5 6 7 8
    1 2 3 4 5 6 7 8
      1 2 3 4 5 6 7 8
\endtt
\bye